This report was prepared for the UN . It analyzes the relationship between a countries GDP, life expectancy, and CO2 emissions. Our goal was to determine to what degree a country’s economic strength or weakness may be related to it’s public health status and impact on climate pollution. We hypothesize that both life expectancy and CO2 emissions will increase with a county’s GFP.
n_countries <- gapminder_1997 %>%
select(country) %>%
n_distinct()
minGDP <- gapminder_1997 %>%
summarize(min=min(gdpPercap)) %>%
round(digits=2)
maxGDP <- gapminder_1997 %>%
summarize(max=max(gdpPercap)) %>%
round(digits=2)
The above plot shows the relationship between the GDP per capita and life expectany for a total of 142 countries. For this set of countries, economic wealth ranged from a minimum of $312.19 to a maximum of $4.128316^{4} per capita.
| Summary of Data | |
|---|---|
| Number of countries | 142 |
| Minimum GDP per cap | 312.19 |
| Maximum GDP per cap | 4.128316^{4} |
gapminder_1997 %>%
filter(continent == "Oceania") %>%
kable()
| country | pop | continent | lifeExp | gdpPercap |
|---|---|---|---|---|
| Australia | 18565243 | Oceania | 78.83 | 26997.94 |
| New Zealand | 3676187 | Oceania | 77.55 | 21050.41 |